Creating A User Defined Function Using An If Then Else Statement In Excel Vba